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Declare a structure for 
storage of persistent data 
values 






Declare a plurality of 
objects having data 
values that conform to the 
structure 
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Declare a class that 
derives from the structure 
and including a method 
for converting structure 
references into instances 
of the class 
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Allocate memory for the 
objects and assign the 
data values to the objects 
via compilation 
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example 
structure 



struct SPerson 
{ 

char *m_name; 
unsigned long m_dob; 

}; 
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example 
class 

class CPerson : private SPerson 

{ 

public: 

static CPerson &convertTo( SPerson &from ) 
{ 

return static_cast< CPerson & >( from ); 

} 

}; 
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{ 



SPerson myData = 
{ 

"John Smith", 
19620612 

} 



example 
code 



CPerson &me = CPerson::convertTo( myData ); 



} 
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example 
traits 



class CPersonTraits 
{ 

public: 
typedef CPerson type; 
typedef SPerson data; 
typedef SPerson base; 

}; 

class CCarTraits 
{ 

public: 
typedef CCar type; 
typedef SCar data; 
typedef SCar base; 

}; 

struct SCar 
{ 

char *m_make; 
char *m_model; 

CPersonTraits: :data *m_owner; 

}; 



class CPerson : private CPersonTraits: :base 
{ 

public: 

typedef CPersonTraits traits; 

static traits::type &convertTo( traits: :data &from ) 



J 



>; 



return static_cast< traits: :type & >( from ); 



class CCar : private CCarTraits:: base 
{ 

public: 
typedef CCarTraits traits; 

static traits: :type &convertTo( traits: :data &from ) 



return static_cast< traits: :type & >( from ); 



CPerson &owner() 



Jl 



return CPerson::convertTo( *m_owner ); 
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example 
collection 

template< class CollectionTraits > 

struct SStructCollection 

{ 

unsigned int m_size; 

CollectionTraits: :collectionData *m_f irst; 

}; 
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template< class TypeTraits, class Initializer = CNullStructCollectionlnitializer< 

TypeTraits > > 

class CStructCollectionTraits 

{ 

public: 

typedef TypeTraits:: data collectionData; 
typedef TypeTraits: :type collectionType; 

typedef CStructCollection< CStructCollectionTraits< TypeTraits, Initializer > 

> type; 

typedef SStructCollection< CStructCollectionTraits< TypeTraits, Initializer > 

> base; 

typedef SStructCollection< CStructCollectionTraits< TypeTraits, Initializer > 

> data; 

typedef CCollectionlterator< TypeTraits > iterator; 

typedef Initializer initializer; 

}; 
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example 

collection 

iterator 



template< class TypeTraits > 
class CCollection Iterator 



public: 

typedef TypeTraits:: data data; 
typedef TypeTraits: :type type; 

CCollection lterator( data *begin ) : m_p( begin ) {} 
CCol lection Iterator^ const CCollection lterator< TypeTraits > &from ) : m_p( 
from.m_p ) {} 

CCollection Iterator &operator =( const CCollection lterator< TypeTraits > 

&from ) 

{ 

m_p = from.m_p; 
return *this; 

} 

-CCollection lterator() {} 

type *operator ->() 
{ 

return &type::convertTo( *m_p ); 

} 

type &operator *() 
{ 

return type::convertTo( *m_p ); 

} 

CCollection lterator< TypeTraits > &operator ++() 
{ 

++m_p; 
return *this; 

} 
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example 

collection 

iterator 



data *pointer() 
return m_p; 

CColletf ionlterator< TypeTraits > operator +( int addend ) const 
return m„p + addend; 

CCollectionlterator< TypeTraits > operator -( int addend ) const 
return m_p - addend; 

bool operator !=( const CCollectionlterator< TypeTraits > &to ) const 
return mjp != to.m_p; 

bool operator <( const CCollectionlterator< TypeTraits > &to ) const 
return m_p < to.rn_p; 

private: 
data *m_p; 
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template< class TypeTraits > 
class CStructCollectionlnitializer 




public: 

typedef TypeTraits: :collection collection; 

inline CStructCollectionlnitializer( collection::traits::data &collectionData ) 
m_collection( collection::convertTo( collectionData ) ) 

{ 

for ( collection: itraits: iterator i = m_collection.begin(); i < m_collection.end(); 
{ 

new( i.pointer() ) TypeTraits::type; 



inline ~CStructCollectionlnitializer() 
{ 

for ( collection::traits::iterator i = m_collection.begin(); i < m_collection.end(); 
{ 

typedef collection::traits::collectionType collectionType; 
i->collectionType::~collectionType(); 

} 

} 

private: 
collection &m_collection; 

}; 
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example 

pre-processor 

macro 

#define COLLECTION_BEGIN( TypeTraits, CollectionName ) \ 
TypeTraits::data CollectionName##Collection[] = \ 

{ 

#define COLLECTION_END( TypeTraits, CollectionName ) \ 

};\ 

TypeTraits::collection::traits::data CollectionName = 
{\ 

sizeof( Collection Name##Collection) / sizeof( TypeTraits: :data ), \ 
CollectionName##Collection \ 

};\ 

TypeTraits::collection::traits::initializer CollectionName##lnitializer( 
CollectionName ); 
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example 




pre-processor 




forward referencing 




macro 


#define COLLECTION_FORWARD( TypeTraits, CollectionName ) \ 


TypeTraits: :data CollectionName##Collection[]; 
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example 




pre-processor 




inter-collection 
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#define ENTRY_REF( Col lection Name, Element ) \ 




&CollectionName##Collection[ ( Element ) ] 
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example 
pre-processor 
empty collection 
macro 



#define COLLECTION J^JO_ENTRIES( TypeTraits, CollectionName ) \ 
TypeTraits::collection::traits::data CollectionName = { 0, 0 }; 
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template< class TypeTraits, unsigned int N = 1 
> 

struct SVirtualSupport 
{ 

struct 
{ 

void *m_vptrs[ N ]; 
TypeTraits::base m data; 


example aggregate 

supporting 

virtual data members 






}; 

void ( *m initializer )( void *where ); 

}; 
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template< class TypeTraits > 
class Clnstancelnitializer 

{ 

public: 

static void initialize( void *where ) 
{ 

new( where ) TypeTraits: :type; 

} 

}; 



example 

vfpointer 

initialization 



FIG. 15B 



ri28 



example 

vfpointer 

initialization 



class CCarTraits 
{ 

public: 
typedef CCar type; 

typedef SVirtualSupport< CCarTraits > data; 
typedef SCar base; 

typedef Clnstancelnitializer< CCarTraits > initializer; 

}; 
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example 

vfpointer 

initialization 



CCar::traits::data carData = 



{ 

}; 



{ { 0 }, { "Ford", "Escort", &personCollection[ 0 ] }, CCarTraits::initializer } 



( *carData.m_initializer )( carData ); // initialize car instance. 

CCar &car = CCar::convertTo( carData ); // produce a real CCar instance 

// from the already initialized data. 



} 
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